home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v7n19.arc / TED.BAS < prev    next >
BASIC Source File  |  1988-10-14  |  16KB  |  206 lines
  1. 100 REM - BASIC PROGRAM TO CREATE TED.COM     
  2. 110 CLS:PRINT "Creating TED.COM     ": OPEN "TED.COM     " AS #1 LEN = 1
  3. 120 FIELD #1, 1 AS A$: CHECKSUM#=0
  4. 130 FOR I = 1 TO   187
  5. 140  LINESUM#=0: LOCATE 2,3: PRINT "Countdown: "   187 - I ;
  6. 150  FOR J = 1 TO  16: READ BYTE$: CHECKSUM#=CHECKSUM#+VAL("&H"+BYTE$)
  7. 160   LINESUM#=LINESUM#+VAL("&H"+BYTE$)
  8. 170   IF (BYTE < 256) THEN LSET A$=CHR$(VAL("&H"+BYTE$)): PUT #1
  9. 180  NEXT J
  10. 190  READ LINETOT$: LINECHECK# = VAL("&H"+LINETOT$)
  11. 200  IF LINECHECK# = LINESUM# THEN GOTO 220
  12. 210  LOCATE 4,2: PRINT "Error in line #"  ;  260 +  10 * I: GOTO 260
  13. 220 NEXT I
  14. 230 CLOSE: READ FILETOT$ : FILECHECK# = VAL(FILETOT$)
  15. 240 IF CHECKSUM# <> FILECHECK# THEN GOTO 260
  16. 250 PRINT: PRINT "TED.COM      created successfully": SYSTEM
  17. 260 PRINT: PRINT "TED.COM      is not valid!": END
  18. 270 DATA E9, 43,  1,  D,  A, 54, 45, 44, 20, 31, 2E, 30, 20, 28, 63, 29,   3A4
  19. 280 DATA 20, 31, 39, 38, 38, 20, 5A, 69, 66, 66, 20, 43, 6F, 6D, 6D, 75,   4CA
  20. 290 DATA 6E, 69, 63, 61, 74, 69, 6F, 6E, 73, 20, 43, 6F, 2E,  D,  A, 50,   52F
  21. 300 DATA 43, 20, 4D, 61, 67, 61, 7A, 69, 6E, 65, 20, FE, 20, 54, 6F, 6D,   5FD
  22. 310 DATA 20, 4B, 69, 68, 6C, 6B, 65, 6E, 24, 1A, 46, 69, 6C, 65, 20, 74,   538
  23. 320 DATA 6F, 6F, 20, 62, 69, 67, 24, 52, 65, 61, 64, 20, 65, 72, 72, 6F,   5A8
  24. 330 DATA 72, 24, 4E, 6F, 74, 20, 65, 6E, 6F, 75, 67, 68, 20, 6D, 65, 6D,   5CC
  25. 340 DATA 6F, 72, 79, 24, 31, 41, 42, 4F, 52, 54,  0, 32, 55, 4E, 44, 4F,   48F
  26. 350 DATA  0, 33, 50, 52, 49, 4E, 54,  0, 34, 4D, 41, 52, 4B,  0, 35, 43,   397
  27. 360 DATA 55, 54,  0, 36, 50, 41, 53, 54, 45,  0, 37, 45, 58, 49, 54,  0,   3CD
  28. 370 DATA 38, 44, 45, 4C, 20, 45, 4F, 4C,  0, 39, 44, 45, 4C, 20, 4C,  0,   387
  29. 380 DATA 31, 30, 55, 44, 45, 4C, 20, 4C,  0,  0, 4C, 6F, 73, 65, 20, 43,   3ED
  30. 390 DATA 68, 61, 6E, 67, 65, 73, 20, 28, 59, 2F, 4E, 29, 3F,  0, 53, 61,   4B0
  31. 400 DATA 76, 65, 20, 61, 73, 3A, 20,  0, 2E, 24, 24, 24,  0, 2E, 42, 41,   374
  32. 410 DATA 4B,  0,  1,  7, 70,  0,  0, FF,  0, 17,  0,  0,  0, 90, 81,  0,   2EA
  33. 420 DATA 81,  0,  0,  0,  0, B0,  0,  0,  0,  0,  0,  0, FF, FF,  0,  0,   32F
  34. 430 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  35. 440 DATA  0,  0,  0,  0, E7,  7, 9F,  7, 63,  7, AB,  6, D9,  6, 2C,  7,   3C1
  36. 450 DATA 23,  8, 8F,  4, AB,  4,  8,  5, FD,  3, FD,  3, 66,  5, 91,  5,   47B
  37. 460 DATA 58,  6, FD,  3, 1D,  5, FD,  3, 48,  5, FD,  3, 7B,  5, ED,  5,   53F
  38. 470 DATA 3D,  6, 61,  6, 69,  6, 33, C0, 8E, D8, B4, 12, B3, 10, CD, 10,   5D8
  39. 480 DATA 80, FB, 10, 74, 17, F6,  6, 87,  4,  8, 75, 10, 2E, C7,  6, 22,   547
  40. 490 DATA  9, EB,  3, A1, 84,  4, FE, C8, 2E, A2, E9,  1, A1, 4A,  4, 2E,   6BD
  41. 500 DATA A3,  8,  2, A1, 63,  4,  5,  6,  0,  E, 1F, A3, F2,  1, 3D, BA,   47A
  42. 510 DATA  3, 75,  8, C7,  6, 22,  9, EB,  3, EB, 17, C7,  6, F4,  1,  0,   52A
  43. 520 DATA B8, 32, FF, B4,  8, CD, 10, 88, 26, E3,  1, 80, F4, 77, 88, 26,   7AD
  44. 530 DATA E4,  1, BB, A8, 11, 8B, E3, 83, C3,  F, B1,  4, D3, EB, B4, 4A,   88D
  45. 540 DATA CD, 21, BB,  0, 10, B4, 48, CD, 21, 8E, C0, B4, 48, CD, 21, 73,   74E
  46. 550 DATA  C, BA, 62,  1,  E, 1F, B4,  9, CD, 21, E9, 48,  5, A3,  A,  2,   4E6
  47. 560 DATA BE, 80,  0, 8A,  C, 32, ED, 46, 56,  3, F1, C6,  4,  0, 89, 36,   60C
  48. 570 DATA F0,  1, 5E, FC, E3, 42, AC, 3C, 20, 75,  2, E2, F9, 4E, 89, 36,   7D7
  49. 580 DATA EE,  1, 8B, D6, B8,  0, 3D, CD, 21, 72, 2D,  6, 1F, 8B, D8, 33,   68D
  50. 590 DATA D2, B4, 3F, B9, FE, FF, CD, 21, 8B, F8, 73,  5, BA, 57,  1, EB,   961
  51. 600 DATA B3, 80, 7D, FF, 1A, 75,  1, 4F, 2E, 89, 3E,  6,  2, 3B, C8, BA,   648
  52. 610 DATA 4A,  1, 74, A0, B4, 3E, CD, 21,  6,  6, B8, 24, 35, CD, 21, 2E,   578
  53. 620 DATA 89, 1E, 10,  2, 2E, 8C,  6, 12,  2,  E, 1F, BA, 90,  C, B8, 24,   3EC
  54. 630 DATA 25, CD, 21, BA, 88,  C, B8, 23, 25, CD, 21,  7, 1F, E8,  6,  6,   569
  55. 640 DATA 2E, 80, 3E, E8,  1,  0, 74, 39, 2E, 80,  E, E2,  1,  4, 2E, 8B,   4DE
  56. 650 DATA 16, FA,  1, 2E, 38, 36, EB,  1, 74,  6, 2E, C6,  6, E2,  1,  1,   4F1
  57. 660 DATA 2E, A1,  4,  2, 2E, 8B, 1E,  0,  2, 3B, C3, 73,  B, 2E, A3, FC,   4F7
  58. 670 DATA  1, 2E, 89, 1E, FE,  1, EB,  9, 2E, A3, FE,  1, 2E, 89, 1E, FC,   66A
  59. 680 DATA  1, 2E, 8B, 16, FA,  1, 2E, 88, 36, EB,  1, E8, 8E,  5, 2E, F6,   642
  60. 690 DATA  6, E2,  1,  1, 74,  F, B4,  1, CD, 16, 75, 1A, E8, FD,  5, 2E,   5AC
  61. 700 DATA C6,  6, E2,  1,  0, 2E, F6,  6, E2,  1,  4, 74,  9, E8,  C,  6,   537
  62. 710 DATA 2E, C6,  6, E2,  1,  0, 32, E4, CD, 16,  A, C0, 74, 1C, 80, FC,   6AC
  63. 720 DATA  E, 74,  6, E8, 7C,  6, E9, 77, FF, 2E, 83, 3E,  4,  2,  0, 74,   5BA
  64. 730 DATA 1C, E8, 39,  1, E8, 82,  2, E9, 66, FF, 80, FC, 84, 75,  6, E8,   85B
  65. 740 DATA 63,  0, E9, 5B, FF, 80, FC, 76, 75,  6, E8, 75,  0, E9, 50, FF,   8A8
  66. 750 DATA 80, FC, 73, 74, 40, 80, FC, 74, 74, 17, 80, FC, 53, 77, EE, 86,   8D8
  67. 760 DATA E0, 2C, 3B, 72, E8, D1, E0, 8B, D8, 2E, FF, 97, 14,  2, E9, 2F,   8A7
  68. 770 DATA FF, 2E, 80, 3E, E5,  1, F7, 73, 19, 2E, 80,  6, E5,  1,  8, E8,   6DE
  69. 780 DATA BD,  7, 2E, 8B, 16, FA,  1, 2E, 88, 16, EA,  1, 2E, C6,  6, E2,   621
  70. 790 DATA  1,  1, E9,  B, FF, 2E, 80, 3E, E5,  1,  0, 74, F5, 2E, 80, 2E,   60C
  71. 800 DATA E5,  1,  8, EB, DA, 33, C0, 2E, A3,  4,  2, 2E, A3,  2,  2, 2E,   580
  72. 810 DATA A2, E5,  1, 2E, C6,  6, E2,  1,  1, 2E, A3, FA,  1, 2E, A2, EA,   6EC
  73. 820 DATA  1, C3, 2E, 8A, 36, E9,  1, 2E, 8B, 36,  6,  2, 2E, C6,  6, E5,   572
  74. 830 DATA  1,  0, E8, 17,  7, E8, DE,  0, 2E, C6,  6, E2,  1,  1, C3, 2E,   59C
  75. 840 DATA C6,  6, EC,  1,  0, 2E, FF, 36,  4,  2, E8, DE,  0, 5E, 2E, 8B,   5FF
  76. 850 DATA  E,  4,  2, 2E, 89, 36,  4,  2, EB, 16, 90, 2E, C6,  6, EC,  1,   47F
  77. 860 DATA  1, E8, B4,  6, 2E, 89, 36,  4,  2, 56, E8, BB,  6, 8B, CE, 5E,   64C
  78. 870 DATA 2B, CE,  A, ED, 74,  3, B9,  0,  1, 2E, 89,  E, F6,  1, E3, 24,   5E4
  79. 880 DATA BF, A8,  E, 51,  6,  E,  7, F3, A4,  7, 58, 2E, 8B,  E,  6,  2,   4A6
  80. 890 DATA 2E, 29,  6,  6,  2, 2E, 8B, 36,  4,  2, 8B, FE,  3, F0, 2B, CE,   4CF
  81. 900 DATA E3,  2, F3, A4, 2E, 8B, 16, FA,  1, 2E, 8B, 36,  4,  2, E8, 9B,   6BE
  82. 910 DATA  6, 2E, C6,  6, E2,  1,  1, C3, 2E, 80, 3E, EC,  1,  0, 74,  3,   4F7
  83. 920 DATA E8, 53,  0, 2E, A1, F6,  1, BE, A8,  E, E9, 8F,  2, 2E, 83, 3E,   6DE
  84. 930 DATA  4,  2,  0, 74, 16, 2E, 8B, 16, FA,  1,  A, D2, 74, 15, 2E, FF,   4EC
  85. 940 DATA  E,  4,  2, E8, B9,  6, 2E, 88, 16, EA,  1, 2E, C7,  6, F8,  1,   566
  86. 950 DATA  0,  0, C3, E8, 4B,  0, EB, 33, 2E, 8B, 36,  4,  2, 2E, 3B, 36,   4A8
  87. 960 DATA  6,  2, 74, E7, 80, 3C,  D, 74,  7, 2E, FF,  6,  4,  2, EB, D3,   59E
  88. 970 DATA E8,  3,  0, E9, 87,  0, E8, FF,  5, 2E, 89, 36,  4,  2, 2E, C6,   62E
  89. 980 DATA  6, EA,  1,  0, 2E, C6,  6, FA,  1,  0, C3, 2E, 8B, 36,  4,  2,   49E
  90. 990 DATA E8,  1,  6, 2E, 89, 36,  4,  2, E8, 64,  6, 2E, 88, 16, EA,  1,   4EB
  91. 1000 DATA C3, 2E, C7,  6, F8,  1,  0,  0, 2E, 8B, 16, FA,  1, 2E, 8B, 36,   570
  92. 1010 DATA  4,  2,  A, F6, 74, 16, FE, CE, E8, AA,  5, 2E, 89, 36,  4,  2,   5E6
  93. 1020 DATA E8, B5,  5, 2E, 89, 36,  4,  2, E8, 19,  5, C3, 2E, 8B, 36,  2,   54F
  94. 1030 DATA  2,  B, F6, 74, F6, E8, 77,  5, 2E, 89, 36,  2,  2, 2E, 8B, 36,   5B1
  95. 1040 DATA  4,  2, E8, 6A,  5, 2E, 89, 36,  4,  2, 2E, C6,  6, E2,  1,  1,   42E
  96. 1050 DATA 2E, 8B, 36,  4,  2, 2E, 8B, 16, FA,  1, E9, E7,  4, 2E, C7,  6,   58E
  97. 1060 DATA F8,  1,  0,  0, 2E, 8B, 16, FA,  1, 2E, 3A, 36, E9,  1, 2E, 8B,   504
  98. 1070 DATA 36,  4,  2, 74, 10, E8, 70,  5, 72,  A, 2E, 89, 36,  4,  2, FE,   48A
  99. 1080 DATA C6, E8, C0,  4, C3, 2E, 3B, 36,  6,  2, 74, F8, E8, 49,  5, 2E,   6AC
  100. 1090 DATA 89, 36,  4,  2, E8, 51,  5, 72, B1, 2E, 89, 36,  4,  2, 2E, 8B,   4D2
  101. 1100 DATA 36,  2,  2, E8, 42,  5, 2E, 89, 36,  2,  2, EB, 9D, 2E, C7,  6,   4DD
  102. 1110 DATA  E,  2, ED,  5, 2E, 8A,  E, E9,  1, 80, E9,  5, 32, ED, 51, 2E,   5BE
  103. 1120 DATA FF, 16,  E,  2, 59, E2, F7, C3, 2E, C7,  6,  E,  2, 91,  5, EB,   6A6
  104. 1130 DATA E3, 2E, F6, 16, E7,  1, E9, ED,  2, 2E, 8B,  E,  6,  2, 2E, 8B,   665
  105. 1140 DATA 36,  4,  2, 8B, FE, 3B, F1, 73, 1B, AC, E8, 56,  1, 8A, 24, 50,   668
  106. 1150 DATA 2E, FF,  E,  6,  2, 2B, CE, F3, A4, 58, 3C,  D, 74,  7, 2E, 80,   59D
  107. 1160 DATA  E, E2,  1,  4, C3, 80, FC,  A, 75,  3, E8, CC, FF, E8, 15,  3,   769
  108. 1170 DATA 2E, 8B, 16, FA,  1, 2E, 88, 16, EA,  1, C3, 33, C0, 2E, F6, 16,   671
  109. 1180 DATA E8,  1, 2E, 38,  6, E8,  1, 75,  F, 2E, C6,  6, E2,  1,  1, 2E,   4CE
  110. 1190 DATA C7,  6, FC,  1, FF, FF, EB,  8, 2E, A1,  4,  2, 2E, A3, FC,  1,   75E
  111. 1200 DATA 2E, A3, FE,  1, 2E, A3,  0,  2, C3, 2E, 80, 3E, E8,  1,  0, 74,   5AF
  112. 1210 DATA 4A, 2E, 8B,  E, FE,  1, 2E, 8B, 36, FC,  1, 2B, CE, 2E, 89,  E,   5BA
  113. 1220 DATA  C,  2, E3, 37, 33, FF, 51,  6, 2E, 8E,  6,  A,  2, F3, A4,  7,   51D
  114. 1230 DATA 58, 2E, 8B,  E,  6,  2, 2E, 29,  6,  6,  2, 2E, 8B, 3E, FC,  1,   380
  115. 1240 DATA 2E, 8B, 36, FE,  1, 2B, CE, E3,  2, F3, A4, 2E, 8B, 16, FA,  1,   72D
  116. 1250 DATA 2E, 8B, 36, FC,  1, E8, 74,  4, E8, 80, FF, C3, 2E, A1,  C,  2,   753
  117. 1260 DATA  B, C0, 74, 2E, 2E, 8B, 36,  4,  2, 50, 56, E8, 77,  3, 5F, 59,   522
  118. 1270 DATA 72, 20, 33, F6, 1E, 2E, 8E, 1E,  A,  2, F3, A4, 1F, 8B, F7, 2E,   625
  119. 1280 DATA 89, 36,  4,  2, 2E, 8B, 16, FA,  1, E8, 40,  4, 2E, C6,  6, E2,   597
  120. 1290 DATA  1,  1, C3, 2E, 80, 3E, E8,  1,  0, 74, 33, 2E, 8B,  E, FE,  1,   507
  121. 1300 DATA 2E, 8B, 36, FC,  1, 2B, CE, E3, 22, B4,  2, 33, D2, CD, 17, F6,   77F
  122. 1310 DATA C4, 80, 74, 17, F6, C4, 20, 75, 12, AC, 32, E4, CD, 17, D0, CC,   872
  123. 1320 DATA 72,  9, E2, F5, B0,  D, 80, F4,  0, CD, 17, E8,  D, FF, C3, 33,   851
  124. 1330 DATA C0, 2E, 87,  6, F8,  1, BE, A8,  D, EB,  1, 90, 56, 2E, 8B, 36,   6A8
  125. 1340 DATA  4,  2, 50, 56, E8, FE,  2, 5F, 59, 5E, 72, 16, 1E,  E, 1F, F3,   570
  126. 1350 DATA A4, 8B, 36,  4,  2, 8B, 16, FA,  1, C6,  6, E2,  1,  1, 1F, E8,   5BE
  127. 1360 DATA CA,  3, C3, 2E, 8B, 1E, F8,  1,  A, FF, 75,  A, 2E, FF,  6, F8,   713
  128. 1370 DATA  1, 2E, 88, 87, A8,  D, C3,  E, 1F, 8A, 36, E9,  1, FE, C6, 32,   683
  129. 1380 DATA D2, BE, BA,  1, E8, 60,  4, 32, E4, CD, 16,  C, 20, 3C, 79, 74,   6E5
  130. 1390 DATA  6, E8, 52,  1,  6, 1F, C3, 8A, 36, E9,  1, 32, D2, E8, 1C,  1,   5DC
  131. 1400 DATA FE, C6, E8, 2D,  1,  E, 1F, BA,  3,  1, B4,  9, CD, 21, B8,  0,   628
  132. 1410 DATA 4C, CD, 21, 1E,  6, 8C, C8, 8E, D8, 8E, C0, 8A, 36, E9,  1, FE,   80E
  133. 1420 DATA C6, 32, D2, BE, CE,  1, 52, E8, 1D,  4, 5A, 80, C2,  9, 8B, 36,   718
  134. 1430 DATA EE,  1, E8, 12,  4, 32, E4, CD, 16, 8B, 3E, F0,  1,  A, C0, 74,   6DE
  135. 1440 DATA DA, 3C, 1B, 75,  A, C6,  6, E2,  1,  1,  7, 1F, E9, F7,  0, 3C,   5A2
  136. 1450 DATA  D, 74, 23, 3C,  8, 75, 10, 3B, 3E, EE,  1, 7E, BE, C6, 45, FF,   61B
  137. 1460 DATA  0, FF,  E, F0,  1, EB, B4, 81, FF, C2,  0, 7F, AE, 32, E4, AB,   8CD
  138. 1470 DATA FF,  6, F0,  1, EB, A5, 8B, 16, EE,  1, B8,  0, 43, CD, 21, 73,   772
  139. 1480 DATA  5, 3D,  3,  0, 74, 15, BE, D8,  1, BF, A8,  C, E8, D1,  3, BA,   64E
  140. 1490 DATA A8,  C, B4, 3C, B9, 20,  0, CD, 21, 73,  E, B8,  7,  E, CD, 10,   596
  141. 1500 DATA E9, 78, FF, B4, 3E, CD, 21, EB, F2, 33, D2, 8B,  E,  6,  2, 8B,   84E
  142. 1510 DATA F9, 8B, D8, B4, 40, 1F, 83, F9, FF, 74,  4, 41, C6,  5, 1A, CD,   855
  143. 1520 DATA 21, 1F, 72, DF, 3B, C1, 75, DB,  E, 1F, B4, 3E, CD, 21, BE, DD,   785
  144. 1530 DATA  1, BF, 28,  D, E8, 89,  3, BA, 28,  D, B4, 41, CD, 21, BF, 28,   622
  145. 1540 DATA  D, 8B, 16, EE,  1, B4, 56, CD, 21, 8B, 3E, EE,  1, BA, A8,  C,   6BB
  146. 1550 DATA B4, 56, CD, 21, 58, 58, E9, FE, FE, 2E, 8A, 3E, E4,  1, EB,  5,   858
  147. 1560 DATA 2E, 8A, 3E, E3,  1, 8A, D8,  6, 2E, 8B, 16, F2,  1, 2E, 8E,  6,   5C6
  148. 1570 DATA F4,  1, EC, D0, C8, 73, FB, 8B, C3, AB,  7, C3, 32, FF, B4,  2,   991
  149. 1580 DATA CD, 10, C3, 2E, A1,  8,  2, F6, E6, 32, F6,  3, C2, D1, E0, 8B,   87E
  150. 1590 DATA F8, C3, E8, EE, FF, 2E, 8B,  E,  8,  2, 2A, CA, E3,  7, B0, 20,   80F
  151. 1600 DATA E8, BD, FF, E2, F9, C3, 1E,  E, 1F, 8A, 36, E9,  1, FE, C6, 32,   92D
  152. 1610 DATA D2, E8, CF, FF, BE, 74,  1, B0, 46, E8, A4, FF, AC,  A, C0, 74,   A26
  153. 1620 DATA 1E, E8, 9C, FF, 2E, 80, 3C, 30, 75,  4, AC, E8, 92, FF, AC,  A,   80F
  154. 1630 DATA C0, 75,  7, B0, 20, E8, 88, FF, EB, DD, E8, 7C, FF, EB, EF, 8A,   B0A
  155. 1640 DATA 36, E9,  1, FE, C6, B2, 4F, E8, A8, FF, B0, 4F, 80, 3E, E7,  1,   919
  156. 1650 DATA  0, 74,  2, B0, 49, 4F, 4F, E8, 66, FF, 1F, C3, 2E, 8B, 36,  2,   62D
  157. 1660 DATA  2, 32, F6, EB,  8, E8, B0,  1, 2E, 8B, 16, FA,  1, 52, E8, 13,   6CD
  158. 1670 DATA  0, 5A, FE, C6, 2E, 3A, 36, E9,  1, 76, F2, C3, E8, 99,  1, 2E,   781
  159. 1680 DATA 8B, 16, FA,  1, 32, D2, 2E, 88, 16, E6,  1, 8B, CA, E8, 53, FF,   7E2
  160. 1690 DATA 2E, 3B, 36,  6,  2, 73, 28, AC, 3C,  D, 74, 1D, 3C,  9, 74, 24,   3A5
  161. 1700 DATA E8, 32,  0, 2E, 3A,  E,  8,  2, 72, E6, 80, 3C,  D, 74,  7, 4F,   485
  162. 1710 DATA 4F, B0,  4, E8,  3, FF, E9, 6F,  1, AC, 3C,  A, 74,  1, 4E, 8B,   686
  163. 1720 DATA D1, E9, 2E, FF, B0, 20, E8,  C,  0, 2E, A0, E6,  1,  2, C1, A8,   7CB
  164. 1730 DATA  7, 75, F1, EB, CE, 2E, 8A, 1E, E6,  1, 2E, 3A, 1E, E5,  1, 73,   6C2
  165. 1740 DATA  8, FE, C3, 2E, 88, 1E, E6,  1, C3, 2E, 3B, 36, FC,  1, 76,  C,   665
  166. 1750 DATA 2E, 3B, 36, FE,  1, 77,  5, E8, BF, FE, EB,  3, E8, C1, FE, FE,   952
  167. 1760 DATA C1, C3, 2E, 8B, 36,  4,  2, 3C,  D, 74, 43, 2E, 8B, 36,  4,  2,   46E
  168. 1770 DATA 2E, 80, 3E, E7,  1,  0, 75, 15, 80, 3C,  D, 74, 10, 2E, 3B, 36,   44A
  169. 1780 DATA  6,  2, 74,  9, 8B, FE, 86,  4, E8, 58, FD, EB,  D, 56, 50, B8,   72B
  170. 1790 DATA  1,  0, E8, 30,  0, 58, 5F, 72, 14, AA, 2E, 80,  E, E2,  1,  4,   4A3
  171. 1800 DATA 2E, FF, 36, F8,  1, E8, B0, FA, 2E, 8F,  6, F8,  1, C3, 56, B8,   87B
  172. 1810 DATA  2,  0, E8, 10,  0, 5F, 72, F5, B8,  D,  A, AB, E8,  6, FF, E8,   70F
  173. 1820 DATA B4, FA, E9, 38, FB, 2E, 8B,  E,  6,  2, 8B, F1, 8B, F9,  3, F8,   894
  174. 1830 DATA 72, 11, 2E, 89, 3E,  6,  2, 2E, 2B,  E,  4,  2, 4F, 4E, FD, F3,   47A
  175. 1840 DATA A4, FC, F8, C3, 2E, 8A,  E, EA,  1, 32, ED, 8B, E9, 2E,  2,  E,   7DD
  176. 1850 DATA E5,  1, 80, D5,  0, 32, D2, 2E, 89, 16, FA,  1, E3, 2A, 51, 80,   6E5
  177. 1860 DATA 3C,  D, 74,  3, E8, 51, FA, 59, 2E, A0, EA,  1, 32, E4, 3B, C1,   717
  178. 1870 DATA 7C,  D, 2E, 8B, 16, FA,  1, 32, F6, 3B, D5, 74,  4, 77,  A, E2,   666
  179. 1880 DATA DD, 8B, CD, 2E, 88,  E, EA,  1, C3, E8,  1, FA, 8B, CD, 2E, 88,   898
  180. 1890 DATA  E, EA,  1, C3, 2E, 3B, 36,  6,  2, 73, 13, 80, 3C,  D, 75,  E,   435
  181. 1900 DATA 46, 2E, 3B, 36,  6,  2, 73,  6, 80, 3C,  A, 75,  1, 46, C3, 2E,   3D9
  182. 1910 DATA FF, 36,  4,  2, E8,  E,  0, 2E, 89, 36,  4,  2, E8, 19,  0, 2E,   453
  183. 1920 DATA 8F,  6,  4,  2, C3, 51, B0,  D, 8B, FE, 8B, CE, E3,  8, 4F, FD,   785
  184. 1930 DATA F2, AE, FC, 47, 8B, F7, 59, C3, 2E, 8B, 36,  4,  2,  B, F6, 74,   7EB
  185. 1940 DATA  6, E8, E1, FF, E8, AD, FF, C3, 51, E8,  8,  0, 72,  4, E8, A3,   967
  186. 1950 DATA FF, F8, 59, C3, B0,  D, 2E, 8B,  E,  6,  2, 2B, CE, 8B, FE, E3,   804
  187. 1960 DATA  9, F2, AE, 8B, F7, E3,  3, 4E, F8, C3, F9, C3, 8A, CE, 32, ED,   A4D
  188. 1970 DATA 2E, 89, 36,  4,  2, 33, D2,  B, F6, 74, 31, E8, BA, FF, 33, D2,   744
  189. 1980 DATA  B, F6, 74, 28, E3, 26, 56, 51, E8, 9A, FF, 59, 58, 80, 3C,  D,   748
  190. 1990 DATA 75, 1A, 3B, F0, 74,  4, FE, C6, E2, EC, 2E, FF, 36,  4,  2, 2E,   75B
  191. 2000 DATA 89, 36,  4,  2, E8, 91, FF, 2E, 8F,  6,  4,  2, 2E, 89, 36,  2,   4F5
  192. 2010 DATA  2, 2E, 89, 16, FA,  1, E8,  6,  0, 2E, 88, 16, EA,  1, C3, 2E,   560
  193. 2020 DATA 8B, 36,  4,  2, E8, 71, FF, 2E, 8B,  E,  4,  2, 2B, CE, 2E, 8B,   59E
  194. 2030 DATA 16, FA,  1, 32, D2, 2E, 88, 16, E6,  1, E3, 37, AC, 3C,  D, 74,   64B
  195. 2040 DATA 32, 3C,  9, 75, 17, 2E, 8A, 1E, E6,  1, 80, CB,  7, 2E, 88, 1E,   4E6
  196. 2050 DATA E6,  1, 2E, 3A, 1E, E5,  1, 72,  3, 80, CA,  7, 2E, 8A, 1E, E6,   5D5
  197. 2060 DATA  1, FE, C3, 2E, 88, 1E, E6,  1, 2E, 3A, 1E, E5,  1, 76,  2, FE,   65F
  198. 2070 DATA C2, E2, C9, 2E, 3A, 16,  8,  2, 72,  7, 2E, 8A, 16,  8,  2, FE,   544
  199. 2080 DATA CA, 2E, 89, 16, FA,  1, C3, 52, E8, D8, FC, 5A, AC,  A, C0, 74,   8A7
  200. 2090 DATA  9, FE, C2, 52, E8, A2, FC, 5A, EB, F2, E8, BF, FC, E9, D2, FC,   C32
  201. 2100 DATA 56, 8B, 36, EE,  1, AC, 3C, 2E, 74,  7,  A, C0, 74,  3, AA, EB,   66D
  202. 2110 DATA F4, B9,  5,  0, 5E, F3, A4, C3, 2E, C6,  6, E2,  1,  1, F8, CF,   80F
  203. 2120 DATA 9C, 50, 53, 52, 2E, C6,  6, E2,  1,  1, 33, D2, E8, 8D, FC, 5A,   73F
  204. 2130 DATA 5B, 58, 9D, 2E, FF, 2E, 10,  2,  0,  0,  0,  0,  0,  0,  0,  0,   2BD
  205. 2140 DATA 298014
  206.